object RegForm: TRegForm
  Left = 302
  Top = 118
  BorderStyle = bsToolWindow
  Caption = 'Your Registration Details'
  ClientHeight = 486
  ClientWidth = 516
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  Scaled = False
  OnCreate = FormCreate
  PixelsPerInch = 125
  TextHeight = 16
  object Panel1: TPanel
    Left = 6
    Top = 7
    Width = 503
    Height = 420
    BevelOuter = bvLowered
    Font.Color = clBlack
    Font.Height = -14
    Font.Name = 'Courier New'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object FirstNameLabel: TPanel
      Left = 8
      Top = 8
      Width = 125
      Height = 27
      Caption = 'First name:'
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
    end
    object FirstNameEdit: TEdit
      Left = 139
      Top = 10
      Width = 352
      Height = 25
      TabOrder = 1
    end
    object Panel2: TPanel
      Left = 8
      Top = 40
      Width = 125
      Height = 27
      Caption = 'Surname:'
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
    end
    object SurnameEdit: TEdit
      Left = 140
      Top = 40
      Width = 352
      Height = 25
      TabOrder = 3
    end
    object AddressMemo: TMemo
      Left = 138
      Top = 79
      Width = 353
      Height = 89
      TabOrder = 4
    end
    object Panel3: TPanel
      Left = 8
      Top = 80
      Width = 125
      Height = 27
      Caption = 'Full address:'
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 5
    end
    object EmailEdit: TEdit
      Left = 139
      Top = 192
      Width = 351
      Height = 25
      TabOrder = 6
    end
    object Panel4: TPanel
      Left = 8
      Top = 192
      Width = 125
      Height = 27
      Caption = 'E-mail:'
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 7
    end
    object FaxEdit: TEdit
      Left = 139
      Top = 225
      Width = 351
      Height = 25
      TabOrder = 8
    end
    object Panel5: TPanel
      Left = 8
      Top = 224
      Width = 125
      Height = 27
      Caption = 'Fax number:'
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 9
    end
    object CommentMemo: TMemo
      Left = 10
      Top = 317
      Width = 480
      Height = 89
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Lines.Strings = (
        'Your comments, questions, or requests... ')
      ParentFont = False
      TabOrder = 10
    end
    object Panel7: TPanel
      Left = 8
      Top = 272
      Width = 125
      Height = 27
      Caption = 'Payment method:'
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 11
    end
    object PaymentMethodCombo: TComboBox
      Left = 140
      Top = 273
      Width = 352
      Height = 24
      Font.Color = clBlack
      Font.Height = -14
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ItemHeight = 16
      Items.Strings = (
        'Personal/business check for U$49 or equiv.'
        'Hard currency to a value of U$49 or equiv.'
        'Online order for $49 via the Internet'
        'Personal check  in native currency (value 49 ECU equivalent)'
        'Cash in native hard currency (value 49 ECU equivalent)'
        'Eurocheque for �27 sterling'
        'Eurocheque for 49 ECU'
        'Sterling cheque on UK bank for �25'
        '�25 GBP currency (cash)'
        'IMO to a value of �27 sterling'
        'Cheque on Finnish bank for 220 Fmk'
        'Credit card order for $49 via ShareIt'
        'Postiennakko 260 mk'
        'Postiosoitus 220 mk'
        'Pankkisiirto 220 mk')
      ParentFont = False
      TabOrder = 12
    end
  end
  object Panel6: TPanel
    Left = 7
    Top = 436
    Width = 502
    Height = 41
    BevelOuter = bvLowered
    TabOrder = 1
    object PrintButton: TButton
      Left = 54
      Top = 8
      Width = 100
      Height = 25
      Caption = 'Print form'
      TabOrder = 0
      OnClick = PrintButtonClick
    end
    object SaveButton: TButton
      Left = 208
      Top = 8
      Width = 100
      Height = 25
      Caption = 'Save form'
      TabOrder = 1
      OnClick = SaveButtonClick
    end
    object Button3: TButton
      Left = 357
      Top = 7
      Width = 100
      Height = 25
      Caption = 'Close'
      TabOrder = 2
      OnClick = Button3Click
    end
  end
end